home *** CD-ROM | disk | FTP | other *** search
/ The Trig Explorer / The Trig Explorer.iso / mac / Explorer / START.dxr / 00016.ls < prev    next >
Encoding:
Text File  |  1998-07-22  |  357 b   |  20 lines
  1. on mouseUp
  2.   global music
  3.   if music = 1 then
  4.     set music to 0
  5.     set the castNum of sprite 4 to cast "MusicOff"
  6.     put 0 into field "Music"
  7.     sound stop 3
  8.     updateStage()
  9.   else
  10.     set music to 1
  11.     set the castNum of sprite 4 to cast "MusicOn"
  12.     put 1 into field "Music"
  13.     updateStage()
  14.   end if
  15. end
  16.  
  17. on mouseDown
  18.   puppetSound("click")
  19. end
  20.